home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 10 / FM Towns Free Software Collection 10.iso / music / naizou / h_kobaya / trn02 / trn02.mml < prev   
Text File  |  1994-11-27  |  16KB  |  948 lines

  1. /*********************************************************************
  2. / Franz Liszt "Transcendental Etudes 2. a-moll"
  3. / MML by H.Kobayashi
  4. /*********************************************************************
  5. /
  6. #include    "trn02.h"
  7. /
  8. /*********************************************************************
  9. / MML detail (2) main
  10. /*********************************************************************
  11. .next
  12.     t152$PI o4l8v7    r4reee
  13.         $PI o4l8v7    r2r4
  14.         $PI o4l16v7 r2r4
  15.         $PI o5l8v7    r2r4
  16.         $PI o4l8v7    r2r4
  17.         $PI o4l8v7    r2r4
  18.         $PI o2l8v7    r2r4
  19.         $PI o2l8v7    r2r4
  20. .next
  21.     t76 !+1'9e4.    t152fff
  22.         r4r             eee
  23.         r2r4
  24.         r2r4
  25.         r2r4
  26.         r2r4
  27.         r2r4
  28.         r2r4
  29. .next
  30.     t76 !+1'9f4.    t152l16 rfrfrf&
  31.         !+1'9e4.        l16 rerere&
  32.         r2r4
  33.         r2r4
  34.         r4r             b-b-b-
  35.         r4r             ddd
  36.         r2r4
  37.         r2r4
  38. .next
  39.     t76 f4.]#4        t152rg+rg+rg+]#4
  40.         e4.]#4            rfrfrf]#4
  41.         r4r8]#4         rerere]#4
  42.         r2r4
  43.         ]b-4.[#4        bbb]#4
  44.         ]d4.[#4         ddd]#4
  45.         r2r4
  46.         r2r4
  47. .next
  48.     rg+ra]#4    rara]#4     rara&]#4
  49.     rfrf]#4     rfrf+]#4    rf+rf+&]#4
  50.     rere]#4     rere]#4     rere&]#4
  51.     r2r4
  52.     bb]#4        bb]#4        bb]#4
  53.     dd]#4        dd+]#4        d+d+]#4
  54.     r2r4
  55.     r2r4
  56. .next
  57.     l8    ar    v11 >>err4
  58.     l8    f+r v11 >brr4
  59.     l8    er    v11 >g+rr4
  60.         r4    v11 err4
  61.         br    v11 <err4
  62.         d+r v11 <<brr4
  63.         r4    v11 g+rr4
  64.         r4    v11 err4
  65. .next
  66.     v6    r4r     l16 q5    <rerf+rg+
  67.     v6    r4r     l16 q5    <rerf+rg+
  68.     v6    r2r4
  69.         r2r4
  70.     v6    r4r             >eee
  71.     v6    r4r         q5    >ed+d
  72.     v6    r2r4
  73.     v6    r2r4
  74. .next
  75. #define     A    rarb>rc <ra]#4rb>rc<]#4
  76.     $A
  77.     $A
  78.     r2r4
  79.     r2r4
  80.     %d32 ]e4.[    %d%0    <e]#4ee]#4
  81.          c<ba            >c]#4<ba]#4
  82.     r2r4
  83.     r2r4
  84. .next
  85. #define     A    rbra[#3 rg+rf[#3 rerd[#2
  86.     $A
  87.     $A
  88.     r2r4
  89.     r2r4
  90.     ]e4.[[#3    e [#3ee[#2
  91.     g+f[#3e     f+[#3gg+[#2
  92.     r2r4
  93.     r2r4
  94. .next
  95. #define     A    rc<rbra >rc]#4<rbra]#4
  96.     $A
  97.     $A
  98.     r2r4
  99.     r2r4
  100.     ]e4.[    e]#4ee]#4
  101.     ab>c    <a]#4g+f]#4
  102.     r4r     o2e]#4ee]#4
  103.     r2r4
  104. .next
  105.     rg+]    q9    rf[#4rf[#2        rfrfrf[#2
  106.     rg+]    q9    rb[#4ra+[#2     rarg+rg+[#2
  107.     r2r4
  108.     r2r4
  109.     l16 e8] q9    >er[#4er[#2     ererer[#2
  110.     l16 e8] q9    >>dr[#4c+r[#2    cr<brbr[#2
  111.     err2
  112.     r2r4
  113. .next
  114.     t-8 rf[#2rfrf[#2    t-8 rfrf[#2rf
  115.         rg[#2rf+rf[#2        rerf[#2re
  116.         r2r4
  117.         r2r4
  118.         er[#2erer[#2        erer[#2er
  119.         a+r[#2arar[#2        g+rar[#2g+r
  120.         r2r4
  121.         r2r4
  122. /---------------------------------------------------------------------
  123. .next
  124. #define     X    e&a&'8g+    a&>c&<'8b    >c&e&'8d+
  125.     t152l24 q9v6    $X            $X
  126.         l16 q8v6    >crerar     >crerar
  127.         l16 q8v6    r2r4
  128.                     r2r4
  129.         l8    q5v6    %d32 o4rcc    ccr
  130.         l8    q5v6    %d64 o3ree    eer
  131.         l8    q5v6         o2raa    aar
  132.         l8    q5v6    r2r4
  133. .next
  134. #define     Y    f&e&'8d+]#3 f&e&'8d+]#3 f&e&'8d+]#3
  135.     $X    ]#3     $Y
  136.     >crerar]#3    >cr]#3    cr]#3    cr]#3
  137.     r4r8]#3     o6ar]#3 ar]#3    ar]#3
  138.     r2r4
  139.     rcc]#3        c]#3    c]#6    r    %d%0
  140.     ree]#3        e]#3    e]#6    r    %d%0
  141.     raa]#3        a]#3    a]#6    r
  142.     r2r4]]#4
  143. .next
  144. #define     Z    (f&d&c+&<b-&a&g+&)2 f&<b&g+&f&e&'8g+
  145.     $Z
  146.     <b-8r8    r4        <'9d24r12r8
  147.     f8r8    r2
  148.     r2r4
  149.     rf        ff        rd
  150.     rb-     b-b-    rb
  151.     ra        aa        re
  152.     o2dr    r4        er
  153. .next
  154.     v9l8    r4r                             v6        aaa
  155.     v9l16    r4r8                            v6q5    <'8crdrer
  156.     v9l16    q9    {<<a&>aa&>(a&<)3}4 !+2a8&    v6q5    '8arbr>cr
  157.     r2r4
  158.     v9q8    car                             v6q5l16 rcrdre
  159.     v9q8    e>er                            v6q5l16 <rarb>rc
  160.     v9q8    <a>>cr                                    r4r
  161.     r2r4
  162. .next
  163.     ]a4.[        a]#3    a]#3    a
  164.     frerd+r     fr]#3    er]#3    dr
  165.     drcr<br     >dr]#3    cr]#3    <br
  166.     r2r4
  167.     rfrerd+     rf]#3    re]#3    rd
  168.     rdrc<rb     >rd]#3    rc]#3    <rb
  169.     r2r4
  170.     r2r4
  171. .next
  172.         r4r                             v6        aaa
  173.         r4r8                            v6        '8crdrer
  174.     v9    q9    {>a&>aa&>(a&<)3}4 !+2a8&    v6q5    '8arbr>cr
  175.     r2r4
  176.     v9q8    c8a8r8                        v6q5    rcrdre
  177.     v9q8    e8>e8r8                     v6q5    <rarb>rc
  178.         <<a>>cr                                 r4r
  179.     r2r4
  180. .next
  181.     ]a4.[        a]#3    a]#3    a
  182.     frerd+r     fr]#3    er]#3    e-r
  183.     drcr<br     >dr]#3    c+r]#3    cr
  184.     r2r4
  185.     rfrerd+     rf]#3    re]#3    re-
  186.     rdrc<rb     >rd]#3    rc+]#3    rc
  187.     r2r4
  188.     r2r4
  189. .next
  190.         r4r                                 v6        b-b-b-
  191.         r4r8                                v6        dre-rfr
  192.     v9    q9    {b-&>b-b-&>(b-&<)3}4 !+2b-8&    v6q5    b-r>crdr
  193.     r2r4
  194.     v9q8    d8b-8r8                         v6q5    rdre-rf
  195.     v9q8    <f8>f8r8                        v6q5    <rb->rcrd
  196.         <<b->>dr                                    r4r
  197.     r2r4
  198. .next
  199.     t+2 ]b-4.[    t+2 a+a+a+
  200.         g-rfre-r    f+rfrer
  201.         e-rdrcr     d+rdrc+r
  202.         r2r4
  203.         rfrerd+     rf+rfre
  204.         re-rdrc     rd+rdrc+
  205.         r2r4
  206.         r2r4
  207. .next
  208.     t+2 ]b4.[#4         t+2 bbb
  209.         dr]#2er]#2f+r        grf+rfr
  210.         <br]#2>c+r]#2d+r    erd+rdr
  211.         r2r4
  212.         rd]#2re]#2rf+        rgrf+rf
  213.         <rb]#2>rc+]#2rd+    rerd+rd
  214.         r2r4
  215.         r2r4
  216. .next
  217.     t+2 ]>c4.[#4    t+2 ccc[
  218.         er]#2fr]#2gr    a-rgrg-r
  219.         cr]#2dr]#2er    frere-r
  220.         r2r4
  221.         re]#2rf]#2rg    ra-rgrg-
  222.         rc]#2rd]#2re    rfrere-
  223.         r2r4
  224.         r2r4
  225. .next
  226.     q9l16    {d-&>d-d-&>d-&<d-d-&}4    <d-8 ]#2    q5    rd-]#2rd-]#2rd-
  227.     r4r                                  ]#2        ra]#2ra-]#2rg-
  228.     r2r4
  229.     r2r4
  230.     f>d-<g->d-                        <a->d-<]#2        ar]#2a-r]#2g-r
  231.     d-rdr                            fr     ]#2        g-r]#2fr]#2dr
  232.     r2r4
  233.     r2r4
  234. .next
  235.     q9    {c+&>c+c+&>c+&<c+c+&}4    <c+8 ]#2    q5    rc+]#2rc+]#2rc+
  236.     r4r                              ]#2        ra]#2rg+]#2rf+
  237.     r2r4
  238.     r2r4
  239.     f>c+<f+>c+                    <g+>c+<]#2        ar]#2g+r]#2f+r
  240.     c+rdr                        fr     ]#2        f+r]#2fr]#2dr
  241.     r2r4
  242.     r2r4
  243. .next
  244.     rc+ v10 rd [    rdrd        rdra
  245.     rf    v10 rf+[    rf+rf+        rf+>rd
  246.     r8    v10 r8 [    r4            r8ra
  247.     r2r4
  248.     fr    v10 c+r[    !+1f+r<f+r    >!+1c+r<c+r
  249.     c+r v9    r2
  250.     r2r4
  251.     r2r4
  252. .next
  253. #define     A    rarara    >rd]#2rd]#2rd
  254.     $A
  255.     rdrdrd                ra]#2ra]#2ra
  256.     $A
  257.     r2r4
  258.     !+1f+r<f+r>!+1c+r    <c+r]#2!+1f+r]#2<f+r
  259.     r2r4]#4
  260.     r2r4
  261.     r2r4
  262. .next
  263. #define     A    rdrara]#2    rara]#2ra
  264.     $A
  265.     ra>rdrd]#2            rdrd]#2rd
  266.     $A
  267.     r2r4
  268.     l8    ]>c+[f+]#2>c+    f+]#2c+c
  269.     l8    o1rf+]#2>c+     f+]#2c+c
  270.     r2r4
  271.     r2r4
  272. .next
  273.     v11 q8l8    >rd]#2        dd]#2        dd]#4
  274.     v11 q8l8    ra]#2        ab-]#2        b>c]#4
  275.     v11 q8l8    >rf+]#2     f+f+]#2     f+f+]#4
  276.     v11 q8        o6rd]#2     dd]#2        dd]#4
  277.     v11 q8        f+c]#2        <bb-]#2     aa-]#4
  278.     v11 q8        f+c]#2        <bb-]#2     aa-]#4
  279.     r2r4
  280.     r2r4
  281. .next
  282.     drg t80 v6    rr4
  283.     crd     v6    rr4
  284.     f+rb    v6    rr4
  285.     drg     v6    rr4
  286.     a-rg    v6    l16 >>r8rggg
  287.     a-rg    v6    rr4
  288.     r2r4    v6
  289.     r2r4
  290. /---------------------------------------------------------------------
  291. .next
  292. #define     A    ra-rb>rc    <ra-rb>rc
  293. #define     B    re-re-re-    re-re-re-
  294. #define     C    rcrcrc        rcrcrc
  295.     t152o5q5l16 $A
  296.         o5q5l16 $B
  297.         o5q5l16 $C
  298.         o5q5l16 r2r4
  299.         o4q8l16 ]a-2.[
  300.         o3q5l8    f>ce-        c<a-f
  301.         o4q9l16 r2r4
  302.         r2r4
  303. .next
  304. #define     D    ]<<rb-rb-[#3    rb-rb-[#3    rgrg[#2
  305. #define     E    ]<rdrd[#3        rc+rc[#3    <rbrb[#2
  306. #define     F    ]a-ra-r[#3        a-ra-r[#3    a-ra-r[#2
  307. #define     G    ]>frfr[#3        ere-r[#3    frfr[#2
  308.     q9        $D
  309.     q9        $E
  310.     r2r4
  311.     r2r4
  312.     q9        $F
  313.     q9l16    $G
  314.     r2         ]#2    drdr[#2
  315.     r2r4
  316. .next
  317.     q5    >    $A
  318.     q5    >>    $B
  319.             $C
  320.     r2r4
  321.     q8        ]a-2.[
  322.     q5l8    <f>ce-    c<a-f
  323.     r2r4
  324.     r2r4
  325. .next
  326.     q9        $D
  327.     q9        $E
  328.     r2r4
  329.     r2r4
  330.     q9        $F
  331.     q9l16    $G
  332.     r2         ]#2    drdr[#2
  333.     r2r4
  334. .next
  335. #define     A    >>rcrdre-    rcrdre-
  336.     v6q5    $A
  337.     v6q5    $A
  338.     v6    r2r4
  339.     v6    r2r4
  340.     v6q8l8    %d32 ]g4.[    %d%0    ggg
  341.     v6q5l8        <e-g>c            <g>e-c
  342.     v6    r2r4
  343.     r2r4
  344. .next
  345.     rdrc<rb-            rargrd
  346.     rdrc<rb-            rargr8
  347.     r2r4
  348.     r2r4
  349.     %d32 ]d4.[    %d%0    ddd
  350.         <<b->dg         db-g
  351.     r2r4
  352.     r2r4
  353. .next
  354. #define     A    re-rfrg re-rfrg
  355.     $A
  356.     $A
  357.     r2r4
  358.     r2r4
  359.     %d32 ]<b-4.[ %d%0    b-b-b-
  360.         <gb->e-         <b->ge-
  361.     r2r4
  362.     r2r4
  363. .next
  364. #define     A    rfre-rd rc<rbrg+
  365.     $A
  366.     $A
  367.     r2r4
  368.     r2r4
  369.     %d32 ]a-4.[ %d%0    g+g+f
  370.         <db>f            <b>dd
  371.     r2r4
  372.     r2r4
  373. .next
  374. #define     A    rarb]#3 >rc<ra]#3 rb>rc]#3
  375.     $A
  376.     $A
  377.     r2r4
  378.     r2r4
  379.     ]e4.[#5     e]#3ee]#3
  380.     c<b]#3a     >c]#3<ba]#3
  381.     r2r4
  382.     r2r4
  383. .next
  384. #define     A    <rb-ra]#3    rgrg    rfre
  385.     $A
  386.     $A
  387.     r2r4
  388.     r2r4
  389.     ]c+4.[#5    c+c+c+
  390.     gf]#3e        b-ag
  391.     r2r4
  392.     r2r4
  393. .next
  394. #define     A    rdrc[#3 <rb>rd[#3 rc<rb[#2
  395.     $A
  396.     $A
  397.     r2r4
  398.     r2r4
  399.     ]<a4[#3     a4[#3    a4[#2[
  400.     fe[#3        df[#3    ed+[#2
  401.     r2r4
  402.     r2r4
  403. .next
  404. #define     A    o1    e^ee^ee>e
  405.     v6    r4r8            >re]#2    rere]#2
  406.     v6    r4r8            >rg+]#2 rarb]#2
  407.     v6    r2r4]#4
  408.     v6    r2r4
  409.     v6    <e&f&g+         >>e]#2    ee]#2
  410.     v6    q8l16 $A    q5l8  e]#2    fg+]#2
  411.     v6    r2r4]#4
  412.     v6    r2r4
  413. .next
  414.     r'8f4.         f8f8f
  415.     >rc<rbra    >rc<rbra
  416.     r2r4
  417.     r2r4
  418.     ]e4.[        eee
  419.     q8    a&b&>c    q5    <ab>c
  420.     r2r4
  421.     r2r4
  422. .next
  423.     r4r8            rb-rb-rb-
  424.     r4r8            >rdrerf
  425.     r2r4
  426.     r2r4
  427.     <<e&f&b-        >>b-b-b-
  428.     q8l16 $A    q5l8  b->c+d
  429.     r2r4
  430.     r2r4
  431. .next
  432.     r'8b4.             b8b8b
  433.     r'8g+4.          a8a8a
  434.     q5    o4rfrerd    rfrerd
  435.     r2r4
  436.     ]b4.[            bbb
  437.     q8    d&e&f        q5    def
  438.     r2r4
  439.     r2r4
  440. .next
  441.     r4r8]#2         >rerere]#2
  442.     r4r8]#2         rg+rarb]#2
  443.     r4r8]#2         rerere]#2
  444.     r2r4
  445.     <<e&f&g+ ]#2    >>g+ab]#2
  446.     r4r      ]#2    rfg+]#2
  447.     q8l16 $A ]#2    l8    >eee]#2
  448.     r2r4
  449. .next
  450.     r'8f4.]#2          f8f8f]#4
  451.     >rc<rbra]#2     >rc<rbra]#4
  452.     r'8e4.]#2          frfrf]#4
  453.     r2r4
  454.     q8    >c&d&e]#2    q5    cde]#2
  455.     q8    a&b&>c]#2    q5    <ab>c]#6
  456.     ]e4.[#6         eee]#2
  457.     r2r4
  458. .next
  459.     r4r8                rb-8b-8b-]#2
  460.     r4r8                >rdrerf]#2
  461.     r4r8                rb-rb-rb-]#2
  462.     r2r4]]
  463.     q8    o1e&f&b-]#2     q5    >>b->c+d]#2
  464.     r2r4
  465.     l16 $A        ]#2     l8    >eee]#2
  466.     r2r4
  467. .next
  468.     q8    rb4.]#2         b8b8b
  469.     q8    rg+4.]#2     a8a8a
  470.         >rfrerd]#2    rfrerd
  471.         rdrc<rb]#2    >rdrc<rb
  472.     q8    d&e&f]#2    q5    fg+a
  473.     q8    <b&>c&d]#2    q5    def
  474.     ]e4.[            r4r
  475.     r2r4
  476. .next
  477. #define     A    rerf+    rg+rarb
  478.     q5v9    '8b8>    $A
  479.     q8v9      g+8r4     >re8e8e
  480.     q5v9    '8e8    $A
  481.     q8v9      b8r4        r4r8
  482.     q5v9    '8g+ed+     dc<b
  483.     q5v9    '8e<ed+     dc<b
  484.     q8v9    r2r4
  485.             r2r4
  486. .next
  487. #define     B    >rc<rbra    >rc<rbra
  488.     $B
  489.     r!+2e4.  e8e8e
  490.     $B
  491.     r2r4
  492.     ab>c    <ag+f
  493.     ab>c    <ag+f
  494.     r2r4
  495.     r2r4
  496. .next
  497. #define     C    ]>r'8e[<<re]#4    rere]#4     rere[
  498. #define     D    q5    r4]#4        <rd+rd]#4    rc<rb[
  499.     $C
  500.     $D
  501.     >r]'8e[r8    r2
  502.     r2r4
  503.     e>e]#4        e q8 e]#4    ee[
  504.     e>e]#4        f+    g+]#4    ab[
  505.     r2r4
  506.     r2r4
  507. .next
  508. #define     E    r!+2'8f+4.]#4    f+8]#4    f+8f+[
  509. #define     F    >r!+2'8d+4.]#4    d+8]#4    d+8d+[
  510. #define     G    <<rarb>rc]#4    <ra]#4    rb>rc[
  511.     $E
  512.     $F
  513.     $G
  514.     r2r4
  515.     !+2e4.]#4    e]#4    ee[
  516.     >c<ba]#4    >c]#4    <ba[
  517.     r2r4
  518.     r2r4
  519. .next
  520.     q5    r'8g+    $A
  521.     q8    rer4        re8e8e
  522.     q5    <r'8g+    $A
  523.         r2r4
  524.     q5    '8e<ed+     dc<b
  525.     q5    '8b<ed+     dc<b
  526.         err2
  527.         r2r4
  528. .next
  529.     $B
  530.     r!+2e4.  e8e8e
  531.     $B
  532.     r2r4
  533.     ab>c    <ag+f
  534.     ab>c    <ag+f
  535.     r2r4
  536.     r2r4
  537. .next
  538.     $C
  539.     $D
  540.     >r'8er8     r2
  541.     r2r4
  542.     e>e]#4        ee]#4        ee[
  543.     e>e]#4        f+g+]#4     ab[
  544.     r2r4
  545.     r2r4
  546. .next
  547.     $E
  548.     $F
  549.     $G
  550.     r2r4
  551.     q8    !+2e4.]#4    e]#4    ee[
  552.     >c<ba     ]#4    >c]#4    <ba[
  553.     r2r4
  554.     r2r4
  555. .next
  556.     v9q8    g+8>re]#4        rfrb-]#4    >rera]
  557.     v9q8    e8rb]#4         >rcrf]#4    rb>re]
  558.     v9q8    <g+8>rg+]#4     ra>rd]#4    rg+>rc+]
  559.     v9q8    r2r4
  560.     v9q7    '8e>e]#4        e-d]#4        dc+]
  561.     v9q7    '8b>e]#4        ee]#4        ee]
  562.     v9q8    <err2
  563.     v9q8    r2r4
  564. .next
  565.     >r!+2d[[<<rd ]#4    rg>rc]#4    rfrb]
  566.     r!+2a [[<<ra ]#4    >rdrg]#4    >rcrf]
  567.     r!+2f+[[<<rf+]#4    rb>re]#4    ra>rd]
  568.     r2r4
  569.     !+2c[[        c]#4    <bb-]#4     aa]
  570.     !+2e[[        e]#4    ee]#4        ee]
  571.     r2r4
  572.     r2r4
  573. .next
  574.     >r!+2e[[o4ra ]#4    >rdrg]#4    >rcrf]
  575.     r!+2b [[o4re ]#4    ra>rd]#4    rg>rc]
  576.     r!+2e [[o4rc+]#4    rf+rb]#4    >rera]
  577.     r2r4
  578.     !+2g+[[     g]#4    ff]#4        ee-]
  579.     !+2e[[        <e]#4    ee]#4        ee]
  580.     r2r4
  581.     r2r4
  582. .next
  583.     r!+2b-[[o4rera     ]#4    >rdrg>rc]#4
  584.     r!+2f [[o3rb>re  ]#4    ra>rdrg]#4
  585.     r!+2b-[[o3rg+>rc+]#4    rf+rb>re]#4
  586.     r2r4
  587.     !+2d    [[dc+     ]#4    c<bb-]#4
  588.     !+2e    [[ee     ]#4    eee]#4
  589.     r2r4
  590.     r2r4
  591. .next
  592.     r!+2f<rb    >r!+2e<ra    >r!+2d<rg
  593.     >r!+2c<rf+    r!+2bre     r!+2ard
  594.     r!+2frd+    r!+2erc+    r!+2d<rb
  595.     r2r4
  596.     aa            g+g         f+f
  597.     ee            ee            ee
  598.     r2r4
  599.     r2r4
  600. .next
  601.     >rc<rf        ]rb-rf[#4        rd<rb-[#4
  602.     rgrc        ]rf+<rb-[#4     rfrf[#4
  603.     >rc<ra        ]rb-rf[#4        rdrd[#4
  604.     r2r4
  605.     ee            ]ee[#4            ee[#4
  606.     r2                ]#4         dd[#4
  607.     q7 o2re-    ]ed[#4        q8    <!+2b-4[#4
  608.     r2r4
  609. .next
  610.     rfrd    <rb-rf    r!+2b-rf
  611.     rd<rb-    rfrd    r!+2drd
  612.     <rb-rf    rd<rb-    r!+2b-rb-
  613.     r2r4
  614.     ee        ee        ee
  615.     dd        dd        dd
  616.     ]]f4    b-4     f4[[
  617.     r2r4
  618. .next
  619.     r!+2br8     r!+2br8     r!+2br8
  620.     r!+2g+rf    r!+2arf     r!+2ar8
  621.     >r!+2drd    r!+2drd     r!+2d+rd+
  622.     o2r!+2brb    r!+2brb     r!+2brb
  623.     ee            ee            ee
  624.     dd            dd            d+d+
  625.     r2                        o1'7br
  626.     ]]o1b4        f4            f4[[
  627. .next
  628.             >e8<re    >re>re>re>re
  629.             g+8r8    r2
  630.             e8r8    r2
  631.     r2r4
  632.     q8l16    e8er    >er>er>er>er
  633.     q8l16    <b8r8    r2
  634.             e8r8    r2
  635.     r2r4
  636. .next
  637.       r!+2e<re<re<    re<re>re
  638.     o7r!+2d<rd<rd<    rd<rd>rd
  639.     r2r4
  640.     r2r4
  641.       !+2er<er<er<    er<er>er
  642.     o6!+2dr<dr<dr<    dr<dr>dr
  643.     r2r4
  644.     r2r4
  645. .next
  646.     t-8 <r!+2e>re>re>    re>re<re
  647.         <r!+2c>rc>rc>    rc>rc<rc
  648.         r2r4
  649.         r2r4
  650.         <!+2er>er>er>    er>er<er
  651.         <!+2cr>cr>cr>    cr>cr<cr
  652.         r2r4
  653.         r2r4
  654. .next
  655.     t-8 re<re    t-8 <re<re    t96 {re>rer}4
  656.         <rb<rb        <rb<rb        {rb->rb-r}4
  657.         r2r4
  658.         r2r4
  659.         er<er        <er<er        {er>err}4
  660.         <br<br        <br<br        {b-r>b-rr}4
  661.         r2r4
  662.         r2r4
  663. /---------------------------------------------------------------------
  664. .next
  665.     t152l24 q9v6    $X                $X
  666.         l16 q8v6    >cr     erar    >crerar
  667.         l16 q8v6    o3ar    r4        r4r8
  668.         l8            r2r4
  669.         l8    q5v6    r    %d32 >cc    ccr
  670.         l8    q5v6    a    %d64 >ee    eer
  671.         l8    q5v6    a         >aa    aar
  672.         l8    q5v6    r2r4
  673. .next
  674.     $X    ]#3     $Y
  675.     >crerar]#3    >cr]#3    cr]#3    cr]#3
  676.     r4r8]#3     o6ar]#3 ar]#3    ar]#3
  677.     r2r4
  678.     rcc]#3        c]#3    c]#6    r    %d%0
  679.     ree]#3        e]#3    e]#6    r    %d%0
  680.     raa]#3        a]#3    a]#6    r
  681.     r2r4]]#4
  682. .next
  683.     $Z
  684.     <b-8r8        r4        <'9d24r12r8
  685.     f8r8        r2
  686.     r2r4
  687.     rf            ff        rd
  688.     rb-         b-b-    rb
  689.     ra            aa        re
  690.     o2dr        r4        er
  691. .next
  692.     v11l8    {a&>aa&>(a&<)3}4 a        q8    >aaa
  693.     v11l8    r4                r        o4cde
  694.     v11l8    r4                r        o3aaa
  695.     r2r4
  696.     v11q8    ca                r        <<ab>c
  697.     v11q8    e>e             r2
  698.     v11q8    <a>>c            r        o1ab>c
  699.     r2r4
  700. .next
  701.     ]a4.[    aaa
  702.     fed     fed
  703.     ]a4.[    aaa
  704.     r2r4
  705.     dc<b    >dc<b
  706.     r2r4
  707.     dc<b    >dc<b
  708.     r2r4
  709. .next
  710.     q9    {<(a&>)3(a&<)3}4 a        v7    q8    >>ccc
  711.     r4                    r        v7    aaa
  712.     r4                    r        v7    cde
  713.     r2r4
  714.         a>>c            r        v7    <<ab>c
  715.     r2r4
  716.         a>>e            r        v7    <<ab>c
  717.     r2r4
  718. .next
  719.     ]c4.[    c]#4c]#4c
  720.     ]a4.[    a]#4a]#4a
  721.     fed     f]#4e]#4d
  722.     r2r4
  723.     dc<b    >d]#4c]#4<b
  724.     r2r4
  725.     dc<b    >d]#4c]#4<b
  726.     r2r4
  727. .next
  728.     v11q9    {<(c&>)3(c&<)3}4 c        v8    q8    >eee
  729.     v11q9    {ra>>ra<<ra}4    r        v8    q8    >ccc
  730.     v11     r4                r        v8    cde
  731.     r2r4
  732.     v11     a>>e            r        v8    <<ab>c
  733.     v11     o3ra            r2
  734.     v11     a>>e            r        v8    <<ab>c
  735.     r2r4
  736. .next
  737.     ]e4.[#5     eee]#3
  738.     ]c4.[#5     ccc]#3
  739.     fed]#3        fed]#3
  740.     r2r4
  741.     dc<b]#3     >dc<b]#3
  742.     r2r4
  743.     dc<b]#3     >dc<b]#3
  744.     r2r4
  745. .next
  746. #define     A    ab>c]#3 dc<b]#3
  747.     !+2a4.]#3    >ccc]#3
  748.     cde]#3        aaa]#3
  749.     !+2a4.]#3    >fed]#3
  750.     r2r4
  751.     $A
  752.     r2r4
  753.     $A
  754.     r2r4
  755. .next
  756.     !+2e4.]#3    aaa
  757.     >!+2c4.]#3    fed
  758.     cde]#3        aaa
  759.     r2r4
  760.     $A
  761.     r2r4
  762.     $A
  763.     r2r4
  764. .next
  765.     v11q7    ]o7c[<<e    efff
  766.     v11q7    ]o6a[r        <reee-
  767.     v11q7    ]o6c[r        r2
  768.     v11q7    r2r4
  769.     v11q7    ]o2a[>>e    efff
  770.     v11q7    ]o2e[>>r    reee-
  771.     v11q7    ]o1a[r        r2
  772.     v11q7    r2r4
  773. .next
  774. #define     A    fb- ag+e
  775. #define     B    df    ff<b
  776. #define     C    rd    cd<g+
  777.         o7!+2f            <<    $A
  778.         o7!+2b-         <<    $B
  779.         o6!+2f            <    $C
  780.             r            rr4 o4br
  781.     %d24 o3!+2f %d%0    >    $A
  782.     %d48 o3!+2d %d%0    >    $B
  783.          o2!+2e         >>    $C
  784.             r            rr4 o3br
  785. .next
  786.     o7!+2c<<e    efff
  787.     o6!+2ar     <reee-
  788.     o6!+2cr     r2
  789.     r2r4
  790.     o3!+2a>e    efff
  791.     o3!+2e>r    reee-
  792.     o2!+2ar     r2
  793.     r2r4
  794. .next
  795.         o7!+2f            <<    $A
  796.         o7!+2b-         <<    $B
  797.         o6!+2f            <    $C
  798.             r            rr4br
  799.     %d24 o3!+2f %d%0    >    $A
  800.     %d48 o3!+2d %d%0    >    $B
  801.          o2!+2e         >>    $C
  802.             r            rr4br
  803. .next
  804. #define     A    cr<c+r>dr    <<br>>cr<<ar
  805. #define     B    er<b-r>f+r    <a-r>er<g-r
  806. #define     C    cr<er>dr    <dr>cr<cr
  807. #define     D    r4c+rr4     <brr4ar
  808. #define     E    ra>rb-<ra    >ra-<ra>rg-
  809. #define     F    re>rg<rf+    >rf<re>re-
  810. #define     G    ra>>rc+<<ra >rb<ra>ra
  811.     t160o7    $A
  812.         o6    $B
  813.         o6    $C
  814.         o5    $D
  815.         o3    $E
  816.         o3    $F
  817.         o2    $G
  818.         r1r2
  819. .next
  820.     ]o6b-[#4a[#4f        d<b-a
  821.     ]o6d[r4             r4r
  822.     ]o5b-[#4a[#4f        d<b-a
  823.     ]o3b-[#4b-[#4b-     b-b-a
  824.     ]o3f[#4f[#4f        fff
  825.     ]o3d[#4d[#4d        ddd
  826.     ]o2a[#4a[#4a        aaa
  827.     r2r4
  828. .next
  829.     g+fe    d<b>e
  830.     r2r4
  831.     g+fe    d<b>e
  832.     g+g+g+    g+g+g+
  833.     eee     eee
  834.     ddd     ddd
  835.     bbb     bbb
  836.     o2aaa    aaa
  837. .next
  838.     o6    $A
  839.     o5    $B
  840.     o5    $C
  841.     o4    $D
  842.     o2    $E
  843.     o2    $F
  844.     o1    $G
  845.     r1r2
  846. .next
  847.     ]o5b-[#4>f[#4d        <b-af
  848.     ]o5d[r4             r4r
  849.     ]o4b-[#4>f[#4d        <b-af
  850.     ]o2b-[#4b-[#4b-     b-aa
  851.     ]o2f[#4f[#4f        fff
  852.     ]o2d[#4d[#4d        ddd
  853.     ]o1a[#4a[#4a        aaa
  854.     r2r4
  855. .next
  856.     ed<b    g+fe
  857.     r2r4
  858.     ed<b    g+fe
  859.     g+g+g+    g+g+g+
  860.     eee     eee
  861.     ddd     ddd
  862.     bbb     bbb
  863.     o1aaa    aaa
  864. .next
  865.     t+4 q8v11    a<a     aa    !+2b-4&]#3
  866.         q8v11    <cr     r4    <aa]#3
  867.         q8v11    ar        r4    ff]#3
  868.         q8v11    r2r4
  869.         q8v11    aa        aa    !+2b-4&]#3
  870.         q8v11    er        r4    aa]#3
  871.         q8v11    >cr     r4    dd]#3
  872.         q8v11    ar        r2
  873. .next
  874.     b-4]#3    !+2b4]]#2    %d%18    >c[[%d%0    r
  875.     aa]#3    aa]]#2        %d32     a[[%d%0    a
  876.     ff]#3    f+f+]]#2    %d64     e[[%d%0    r
  877.     r2                            o3!+2c        r
  878.     b-4]#3    !+2b4]]#2    %d%18    a[[ %d%0    a
  879.     aa]#3    aa]]#2        %d32    e[[ %d%0    r
  880.     dd]#3    d+d+]]#2    %d64    c[[ %d%0    r
  881.     r2                            !+2a        r
  882. .next
  883.     t+4 <aa]#3    !+2b-4]#3    !+2b4]]#2
  884.         r4]#3    aa]#3        aa]]#2
  885.         r4]#3    ff]#3        f+f+]]#2
  886.         r2r4
  887.         aa]#3    !+2b-4]#3    !+2b4]]#2
  888.         r4]#3    aa]#3        aa]]#2
  889.         r4]#3    dd]#3        d+d+]]#2
  890.         r2r4
  891. .next
  892. #define     A    d+<a>d
  893.     >c[[r<b-    b>cd
  894.     a[[aa        aab-
  895.     e[[rf        f+ef
  896.     !+2cr4        r4r
  897.     a[[aa        aaa
  898.     e[[rd        $A
  899.     c[[r4        r4r
  900.     !+2ar4        r4r
  901. .next
  902.     t+4 d+ef]#3     f+ab-]#3
  903.         b>c<b-]#3    b>ea]#3
  904.         f+aa]#3     a>cf]#3
  905.         r2r4
  906.         aa>d]#3     $A    ]#3
  907.         $A    ]#3     $A    ]#3
  908.         r2r4
  909.         r2r4
  910. .next
  911.     b>cf]#3     f+ab-]#3
  912.     aab-]#3     b>ea]#3
  913.     f+ea]#3     a>cf]#3
  914.     r4r]#9        r>ar
  915.     $A    ]#3     $A    ]#3
  916.     $A    ]#3     $A    ]#3
  917.     r2r4
  918.     r2r4
  919. .next
  920.     t+4 b>cf]#3 f+    v13l4    a
  921.         aab-]#3 b    v13l4    >e
  922.         f+ea]#3 a    v13l4    >c
  923.         r2            v13l4    >a
  924.         $A    ]#3 d+    v13l4    <a
  925.         $A    ]#3 d+    v13l4    <a
  926.         r2            v13l4    r
  927.         r2            v13l4    r
  928. .next
  929.     t-8 b-b>c        fr2
  930.         aaa         b-r2
  931.         ff+e        fr2
  932.         b-b>c        rr2
  933.         >dd+<a        >dr2
  934.         >aar        b-r2
  935.         o2dd+<a     >fr2
  936.         r2r4        o2dr2
  937. .next
  938.     e    t76 o5r]{reee}    t60 ]e1
  939.     b        o5r2]            ]c1
  940.     g+        o4r]{reee}        ]e1
  941.     e        r2                r2r4
  942.     e        o3r]{reee}        ]e1
  943.     b        o2r2]            ]a1
  944.     g        r2                r2r4
  945.     e        r2                r2r4
  946. /---------------------------------------------------------------------
  947. .end
  948.